<% Set MyFileSize = Server.CreateObject ("Scripting.FileSystemObject") MyPath = Server.MapPath("/somedirectory") Set MyFolder = MyFileSize.GetFolder(MyPath) %>

<% =MyPath %> is <% =MyFolder.Size %> bytes